Electronic Clipper 1996 July/Electronic Clipper 1996 July.iso/pc/ideasrc/teaser.dir/00017_Script_17

Text File | 1996-06-02 | 477b | 25 lines

on keyDown
  if the key = 1 then
    set the soundLevel to (1)
  end if
  if the key = 2 then
    set the soundLevel to (2)
  end if
  if the key = 3 then
    set the soundLevel to (3)
  end if
  if the key = 4 then
    set the soundLevel to (4)
  end if
  if the key = 5 then
    set the soundLevel to (5)
  end if
  if the key = 6 then
    set the soundLevel to (6)
  end if
  if the key = 7 then
    set the soundLevel to (7)
  end if
end keydown